﻿Public Class WfPrincipalDesp
    Inherits System.Web.UI.Page
    Private DespLog As New Despachante


    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load


    End Sub

    Protected Sub lbdesp_PreRender(sender As Object, e As EventArgs) Handles lbdesp.PreRender
        If Session("DespLogado") Is Nothing Then
            Response.Redirect("/Screens/WF1.aspx")
        Else
            DespLog = Session("DespLogado")
            lbdesp.Text = DespLog.FantasiaDesp
        End If

    End Sub

End Class